PC Gamer (Italian) 28/PC Gamer IT CD 28 1-2.iso/MEDIA/REVIEWS.DXR/Internal_61_clickableEmail.ls

Text File | 1997-12-01 | 695 b | 27 lines

on mouseEnter me
  if the text of field "email" <> EMPTY then
    cursor(280)
  else
    nothing()
  end if
end

on mouseLeave me
  cursor(-1)
end

on mouseDown me
  if the text of field "email" <> EMPTY then
    if the text of field "emailSelect" = EMPTY then
      alert("You have not set your Email Program. You can do this now.")
      go("config", "net")
    else
      copyToClipBoard(member "email")
      alert("Now copying the email address to the clipboard and launching your email program. Once your email program is launched you can paste (CTRL-V) the email address into the recipient field.")
      open(the text of field "emailSelect")
    end if
  else
    nothing()
  end if
end